<?php
session_start();
include('../Lib/php/conex.php');
$link= conectaSQL("influenza","inf123456","influenza");
include('../Lib/php/fechas.php');
include('../Lib/php/funciones.php');
import_request_variables("g,P");
$dHoy = date("Ymd H:i:s");
$imp_tabla = "<table width='750' border='0' align='center' cellpadding='3' cellspacing='3' class='datos cuadro2'><tr><td><img src='images/modi.png'  width='30' height='30' border='0' />";
$imp_fin_tabla = "</td></tr></table>";


if($ciclo == 0){
//LA FECHA DE NACIMIENTO NO PUEDE SER MAYOR AL DIA DE HOY
	if ($fNacimiento > date("Ymd")) {
		$msg = "LA FECHA DE NACIMIENTO NO PUEDE SER MAYOR AL DIA DE HOY";
		echo $imp_tabla.$msg.$imp_fin_tabla;
		die();
	}
}
//CONSTRUCCION DEL CURP
if($nNacionalidad != 1)
{
	$sqlr="select [Catalogos].[dbo].[UF_CURP] ('".limpia_cadena($cNombre)."','".limpia_cadena($cPaterno)."','".limpia_cadena($cMaterno)."','$nAnio$nMeses$nDias','1','$nSexo') as curp";
}else{
$sqlr="select [Catalogos].[dbo].[UF_CURP] ('".limpia_cadena($cNombre)."','".limpia_cadena($cPaterno)."','".limpia_cadena($cMaterno)."','$nAnio$nMeses$nDias','$nEntidad_Nacimiento','$nSexo') as curp";
	//$sqlr="select [Catalogos].[dbo].[UF_CURP] 	('$cNombre','$cPaterno','$cMaterno','$nAnio$nMeses$nDias','$nEntidad_Nacimiento','$nSexo') as curp";
}

$res = mssql_query($sqlr,$link) or die($sqlr.mssql_get_last_message());
$datos = mssql_fetch_array($res);
$_POST["curp"] = $datos["curp"];
//--------------------------

if (!$id_generales > 0) {

	$sqlc = "SELECT * FROM dat_generales 
	WHERE (cNombre = '$cNombre' and cPaterno = '$cPaterno' and cMaterno = '$cMaterno' 
		and id_unidad = '$id_unidad' and nSexo = '$nSexo' and nEntidad = '$nEntidad' 
		and nMunicipio = '$nMunicipio') or curp = '".$_POST["curp"]."'";

	$resc = mssql_query($sqlc,$link);
	$datosc = mssql_num_rows($resc);
	
	if($datosc > 0){
		echo "<script language='javascript'>alert('EL PACIENTE YA SE ENCUENTRA EN NUESTRA BASE DE DATOS. FAVOR DE VERIFICAR');
		</script>";
		return;
	}

	$accion = 1;	
	// Construye nombres de campos 
	$insert = "INSERT INTO $tabla (";
	$valores = " VALUES (";
	$query = mssql_query("select top 1 * from $tabla",$link);
	while($field = mssql_fetch_field($query)){
		$cCampo = $field->name;
		if($field->type == "char" or $field->type == "datetime") $com = "'"; else $com = "";
		foreach($_POST as $valor => $x){
			if($cCampo == $valor and $_POST[$cCampo] != ''){
				$insert .= $cCampo.",";
				if($field->type == "datetime")
					$valores .= $com.formatofecha($_POST[$cCampo])."$com,";
				else
					$valores .= $com.utf8_encode(limpia_cadena($_POST[$cCampo]))."$com,";
			}
		}
	}
	$insert .= " fCreacion)";
	$valores .= "'$dHoy')";		
	$sql = $insert.$valores;

}else{


	$accion = 2;
		// Construye nombres de campos 
	$update = "UPDATE $tabla SET ";
	$query = mssql_query("select top 1 * from $tabla",$link);
	while($field = mssql_fetch_field($query)){
		$cCampo = $field->name;
		if($field->type == "char" or $field->type == "datetime") $com = "'"; else $com = "";
		foreach($_POST as $valor => $x){
			if($cCampo == $valor and $_POST[$cCampo] != '' and $cCampo != 'id_principal' and $cCampo != 'id_unidad'){
				if($field->type == "datetime") {
					$valores = $com.formatofecha($_POST[$cCampo])."$com,";
				}else{
					$valores = $com.utf8_decode(limpia_cadena($_POST[$cCampo])).$com.",";
				}
				$sql .= $cCampo." = ".rtrim($valores);
			}
		}
	}

	// quita ultima coma

	$sql = substr($sql,0,-1);
	$sql = $update.$sql." WHERE id_principal = $id_generales ";
}
//echo $sql;
//die();
$ejecutaQuerys = mssql_query($sql,$link) or die($sql.mssql_get_last_message());

// si inserto un nuevo registro, guarda el id principal
if(!$id_principal){
	$sqllast="SELECT IDENT_CURRENT('$tabla')";
	$res = mssql_query($sqllast,$link) or die(mssql_get_last_message());
	list($last) = mssql_fetch_array($res);
	
	$sqlr="SELECT id_principal from dat_registro where id_generales = $last";
	$resr = mssql_query($sqlr,$link) or die(mssql_get_last_message());
	list($lastr) = mssql_fetch_array($resr);
	
}else{
	$last = $id_principal;
}

// Agrega registro a la bitacora de seguridad
// ---------------------------------------------------------------------------------
	$iplocal = $_SERVER['REMOTE_ADDR'];
	$host = gethostbyaddr($_SERVER['REMOTE_ADDR']);
	$user = $_SESSION['id_usuario'];
	$query_bitacora = "INSERT INTO aux_bitacora (id_principal,cIp,id_usuario,nAccion,cTabla,cHost) 
		VALUES ($last,'$iplocal',$user,$accion,'$tabla','$host')";
	//echo $query_bitacora;	
	mssql_query($query_bitacora,$link) ;

// ---------------------------------------------------------------------------------

if ($ejecutaQuerys) {
if (!$id_generales > 0){
echo "<script language='javascript'> alert('Los datos generales se guardaron correctamente. Por favor continue con el registro de datos clinicos');";
echo "liga('pacienteh2.php?id_principal=$lastr&id_generales=$last&npag=$npag&nTipoPaciente=$nTipoPaciente&nuevoe=5','general');</script>";
}
else
{
echo "<script language='javascript'> alert('Los datos generales se guardaron correctamente. Por favor continue con el registro de datos clinicos');";
echo "liga('pacienteh2.php?id_generales=$id_generales&npag=$npag&id_principal=$id_principal&nuevoe=5&&nTipoPaciente=$nTipoPaciente','general');</script>";
}
}


?>